CU Amiga Super CD-ROM 22/CU Amiga Magazine's Super CD-ROM 22 (1998)(EMAP Images)(GB)[!][issue 1998-05].iso/PowerPC/Programming/PPCSmallEiffel/lib_show/animal/chat.e

Text File | 1998-01-16 | 302 b | 21 lines

class CHAT

inherit
   QUADRUPEDE
      redefine reproduction_avec_quadrupede
      end;

feature {ANY}

   reproduction_avec_quadrupede(quadrupede: CHAT): CHAT is
      do
         Result := Current;
      end;

   crier is
      do
     std_output.put_string("MIAOU");
      end;

end -- CHAT